home *** CD-ROM | disk | FTP | other *** search
- VERSION 5.00
- Object = "{02B5E320-7292-11CF-93D5-0020AF99504A}#1.0#0"; "MSCHART.OCX"
- Begin VB.Form MsChartFrm
- BackColor = &H00FFFFFF&
- Caption = "MsChartFrm"
- ClientHeight = 5700
- ClientLeft = 6180
- ClientTop = 3075
- ClientWidth = 9165
- LinkTopic = "Form1"
- MDIChild = -1 'True
- ScaleHeight = 5700
- ScaleWidth = 9165
- WindowState = 2 'Maximized
- Begin VB.CommandButton Command2
- BackColor = &H00FFFFFF&
- Caption = "Close"
- Height = 345
- Left = 6570
- Style = 1 'Graphical
- TabIndex = 2
- Top = 195
- Width = 810
- End
- Begin MSChartLib.MSChart MSChart1
- Height = 4125
- Left = 375
- OleObjectBlob = "MsChartFrm.frx":0000
- TabIndex = 0
- Top = 945
- Width = 6180
- End
- Begin VB.Shape Shape1
- Height = 36
- Left = 684
- Top = 732
- Width = 5568
- End
- Begin VB.Label Label1
- Alignment = 1 'Right Justify
- BackColor = &H00FFFFFF&
- Caption = "Printing MsChart With RobOPrint"
- BeginProperty Font
- Name = "MS Sans Serif"
- Size = 13.5
- Charset = 177
- Weight = 700
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- Height = 600
- Left = 675
- TabIndex = 1
- Top = 270
- Width = 5235
- End
- Attribute VB_Name = "MsChartFrm"
- Attribute VB_GlobalNameSpace = False
- Attribute VB_Creatable = False
- Attribute VB_PredeclaredId = True
- Attribute VB_Exposed = False
- Private Sub Command2_Click()
- Unload Me
- End Sub
-